Voorbeeld van de functie UCase

Dit voorbeeld maakt gebruik van de functie UCase om van de tekenreeks een versie met hoofdletters als resultaat te geven.

Dim LowerCase, UpperCase
LowerCase = "Hallo allemaal 1234"    ' Om te zetten tekenreeks.
UpperCase = UCase(LowerCase)    ' Geeft "HALLO ALLEMAAL 1234".